home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / macros / plain / contrib / vertex / vertex.tex < prev   
Encoding:
Text File  |  1991-05-22  |  16.3 KB  |  492 lines
  1. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  2. %
  3. %                            VerTeX
  4. %                           Hal Varian
  5. %                           August 1987
  6. %
  7. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  8.  
  9.  
  10. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  11. %
  12. %      verbatim macros from TeXbook, page 380--382.
  13. %          to invoke, type: \verbatim# TeX stuff ...#
  14. %          Any character can be used in place of #.
  15. %
  16. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  17.  
  18. \def\uncatcodespecials{\def\do##1{\catcode`##1=12}\dospecials}
  19.  
  20. \def\setupverbatim{\tt%
  21. \def\par{\leavevmode\endgraf}\catcode`\`=\active%
  22. \obeylines\uncatcodespecials\obeyspaces}%
  23. {\obeyspaces\global\let =\ }%
  24. {\catcode`\`=\active \gdef`{\relax\lq}}
  25.  
  26. \def\verbatim{\begingroup\setupverbatim\doverbatim}
  27. \def\doverbatim#1{\def\next##1#1{##1\endgroup}\next}
  28.  
  29. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  30. %   Load various fonts
  31. %      there are both computer modern and almost modern fonts
  32. %      available; comment out the ones you aren't using
  33. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  34.  
  35. %%%%%%%%%%%%%%%%%%%%%%%%%
  36. %  Computer Modern fonts
  37. %%%%%%%%%%%%%%%%%%%%%%%%%
  38.  
  39. \font\sctwelve=cmcsc10 scaled\magstep1
  40. \font\scten=cmcsc10 
  41.  
  42. \font\tenrm=cmr10
  43. \font\teni=cmmi10
  44. \font\tensy=cmsy10
  45. \font\tenbf=cmbx10
  46. \font\tenit=cmti10
  47.  
  48. \font\ninerm=cmr9   \font\eightrm=cmr8    \font\sixrm=cmr6
  49. \font\ninei=cmmi9   \font\eighti=cmmi8    \font\sixi=cmmi6
  50. \font\ninesy=cmsy9  \font\eightsy=cmsy8   \font\sixsy=cmsy6
  51. \font\ninebf=cmbx9  \font\eightbf=cmbx8   \font\sixbf=cmbx6
  52. \font\nineit=cmti9  \font\eightit=cmti8
  53.  
  54. %%%%%%%%%%%%%%%%%%%%%%%%%
  55. %  Almost Modern fonts
  56. %%%%%%%%%%%%%%%%%%%%%%%%%
  57.  
  58. %\font\sctwelve=amcsc10 scaled\magstep1
  59. %\font\scten=amcsc10 
  60. %
  61. %\font\tenrm=amr10
  62. %\font\teni=ammi10
  63. %\font\tensy=amsy10
  64. %\font\tenbf=ambx10
  65. %\font\tenit=amti10
  66. %
  67. %\font\ninerm=amr9   \font\eightrm=amr8    \font\sixrm=amr6
  68. %\font\ninei=ammi9   \font\eighti=ammi8    \font\sixi=ammi6
  69. %\font\ninesy=amsy9  \font\eightsy=amsy8   \font\sixsy=amsy6
  70. %\font\ninebf=ambx9  \font\eightbf=ambx8   \font\sixbf=ambx6
  71. %\font\nineit=amti9  \font\eightit=amti8
  72.  
  73. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  74. %   Define font families
  75. %       (see TeXbook, p. 414-5)
  76. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  77.  
  78. \catcode`@=11
  79. \newskip\ttglue
  80.  
  81. \def\tenpoint{\def\rm{\fam0\tenrm}%
  82. \textfont0=\tenrm \scriptfont0=\sevenrm \scriptscriptfont0=\fiverm%
  83. \textfont1=\teni \scriptfont1=\seveni \scriptscriptfont1=\fivei%
  84. \textfont2=\tensy \scriptfont2=\sevensy \scriptscriptfont2=\fivesy%
  85. \textfont3=\tenex \scriptfont3=\tenex \scriptscriptfont3=\tenex%
  86. \textfont\itfam=\tenit \def\it{\fam\itfam\tenit}%
  87. \textfont\bffam=\tenbf \scriptfont\bffam=\sevenbf%
  88. \scriptscriptfont\bffam=\fivebf \def\bf{\fam\bffam\tenbf}%
  89. \tt \ttglue=.5em plus.25em minus.15em%
  90. \ifdouble\normalbaselineskip=1.5pc plus .5pt minus .5pt \else\normalbaselineskip=12pt\fi
  91. \setbox\strutbox=\hbox{\vrule height8.5pt depth3.5pt width0pt}%
  92. \let\sc=\eightrm \normalbaselines\rm}
  93.  
  94. \def\ninepoint{\def\rm{\fam0\ninerm}%
  95. \textfont0=\ninerm \scriptfont0=\sixrm \scriptscriptfont0=\fiverm%
  96. \textfont1=\ninei\scriptfont1=\sixi\scriptscriptfont1=\fivei%
  97. \textfont2=\ninesy \scriptfont2=\sixsy \scriptscriptfont2=\fivesy%
  98. \textfont3=\tenex \scriptfont3=\tenex \scriptscriptfont3=\tenex%
  99. \textfont\itfam=\nineit\def\it{\fam\itfam\nineit}% 
  100. \textfont\bffam=\ninebf\scriptfont\bffam=\sixbf%
  101. \scriptscriptfont\bffam=\fivebf\def\bf{\fam\bffam\ninebf}% 
  102. \tt \ttglue=.5em plus.25em minus.15em %
  103. \normalbaselineskip=11pt%
  104. \setbox\strutbox=\hbox{\vrule height8pt depth3pt width0pt}% 
  105. \let\sc=\sevenrm\let\big=\ninebig\normalbaselines\rm}
  106.  
  107. \def\eightpoint{\def\rm{\fam0\eightrm}%
  108. \textfont0=\eightrm \scriptfont0=\sixrm \scriptscriptfont0=\fiverm%
  109. \textfont1=\eighti \scriptfont1=\sixi \scriptscriptfont1=\fivei%
  110. \textfont2=\eightsy \scriptfont2=\sixsy \scriptscriptfont2=\fivesy%
  111. \textfont3=\tenex\scriptfont3=\tenex \scriptscriptfont3=\tenex%
  112. \textfont\itfam=\eightit \def\it{\fam\itfam\eightit}%
  113. \textfont\bffam=\eightbf \scriptfont\bffam=\sixbf%
  114. \scriptscriptfont \bffam=\fivebf \def\bf{\fam\bffam\eightbf}%
  115. \tt \ttglue=.5em plus.25em minus.15em%
  116. \normalbaselineskip=9pt%
  117. \setbox\strutbox=\hbox{\vrule height7pt depth2pt width0pt}%
  118. \let\sc=\sixrm \let\big=\eightbig\normalbaselines\rm}
  119.  
  120. \def\tenbig#1{{\hbox{$\left#1\vbox to 8.5pt{}\right.\n@space$}}}
  121. \def\ninebig#1{{\hbox{$\textfont0=\tenrm\textfont2=\tensy
  122.    \left#1\vbox to7.25pt{}\right.\n@space$}}}
  123. \def\eightbig#1{{\hbox{$\textfont0=\ninerm\textfont2=\ninesy
  124.    \left#1\vbox to6.5pt{}\right.\n@space$}}}
  125.  
  126. %Only a partial setup for 6-point, since it is used so rarely
  127. \def\sixpoint{\def\rm{\fam0\sixrm}% switch to 6-point type
  128.  \textfont0=\sixrm \textfont2=\sixsy
  129.  \textfont\itfam=\sixi \def\it{\fam\itfam\sixi}%
  130.  \normalbaselineskip=7.5pt\normalbaselines\rm}
  131.  
  132.  
  133. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  134. % \fnote -- numbered footnotes in small type -- from TeXbook, p. 416
  135. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  136.  
  137. %register for automatic footnote numbering
  138. \newcount\FootNumber
  139. \FootNumber=1
  140.  
  141. %insert for holding footnotes to print as endnotes at end of paper
  142.  
  143. \newinsert\endnoteins        %define a new insert
  144. \skip\endnoteins=0pt         %space added when endnote is present
  145. \count\endnoteins=0          %magnification factor
  146. \dimen\endnoteins=\maxdimen  %maximum endnotes per page
  147.  
  148. %print endnotes
  149. \def\PrintEndNotes{\vfill\eject\ifvoid\endnoteins
  150.                      \else\centerline{\bf Footnotes}\parskip=\medskipamount
  151.                      \bigskip\unvbox\endnoteins\fi}
  152.  
  153. %footnote macro
  154. %    Write notes in 8 point
  155. %    Write to \endnotesins for end notes
  156.  
  157.  
  158. \def\fnote#1{\footnote{$^{\the\FootNumber}$}{\eightpoint #1\endfnote}
  159. \insert\endnoteins{\tenpoint\medskip\noindent\number\FootNumber. #1\par
  160. \ifdouble\bigskip\fi}%
  161. \global\advance\FootNumber by 1}
  162.  
  163. %      We must end paragraph to restore original baselines and
  164. %      therefore have to skip up the amount of the baselineskip to keep
  165. %      the space between footnotes right.
  166.  
  167. \def\endfnote{\par\vskip-\normalbaselineskip}
  168.  
  169. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  170. %      \makeheadline -- redefine to omit headline on title pages (p. 364
  171. %                       of TeXBook)
  172. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  173.  
  174. \newif\iftitle                      %true if this is a titlepage
  175.   \global\titlefalse
  176.  
  177. \def\titlepage{\global\titletrue}  %set flag if this is a Titlepage
  178.  
  179. \def\titlehead{\hfil}
  180. \def\titlefoot{\hfil}
  181.  
  182. \def\makeheadline{\vbox to 0pt{\vskip-22.5pt%
  183.     \line{\vbox to8.5pt{}%
  184.     \iftitle\titlehead
  185.     \else\the\headline\fi}\vss}\nointerlineskip}
  186.  
  187. \def\makefootline{\baselineskip=24pt 
  188.    \iftitle\line{\titlefoot}\global
  189.    \titlefalse\else\line{\the\footline}\fi}
  190.  
  191. %no footnoterule by default; can reset in sty files.
  192. \def\footnoterule{}
  193.  
  194. \def\pagecontents{\ifvoid\topins\else
  195. \unvbox\topins\fi
  196.   \dimen@=\dp\@cclv \unvbox\@cclv % open up \box255
  197.   \ifvoid\footins\else % Footnote info is present
  198.     \vskip\skip\footins \footnoterule \unvbox\footins\fi
  199.   \ifr@ggedbottom \kern-\dimen@ \vfil \fi}
  200.  
  201. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  202. %     Create various boxes
  203. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  204.  
  205. \newbox\titlebox
  206. \newbox\authorbox
  207. \newbox\affilbox
  208. \newbox\addressbox
  209. \newbox\keywordsbox
  210. \newbox\datebox
  211. \newbox\versionbox
  212. \newbox\thanksbox
  213. \newbox\abstractbox
  214.  
  215. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  216. %   Create various counters
  217. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  218.  
  219. \newcount\SectionNumber\SectionNumber=1
  220. \newcount\SubsectionNumber\SubsectionNumber=1
  221. \newcount\EquationNumber\EquationNumber=0
  222. \newcount\FigureNumber\FigureNumber=0
  223.  
  224. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  225. %  \Reset -- to reset all counters and \pageno
  226. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  227.  
  228. \def\Reset{\global\SectionNumber=1\global\SubsectionNumber=1
  229. \global\EquationNumber=0\global\FigureNumber=0\global\pageno=1
  230. \global\FootNumber=1}
  231.  
  232. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  233. %   \today -- gives today's date
  234. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  235.  
  236. \def\today{\ifcase\month\or
  237.    January\or February\or March\or April\or May\or June\or
  238.    July\or August\or September\or October\or November\or December\fi
  239.    \space\number\day, \number\year}
  240.  
  241. %can reset this in sty files.
  242. \def\version#1{}
  243.  
  244. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  245. %   Some math definitions
  246. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  247.  
  248. %can redefine in .sty files
  249. \def\proof{\medbreak\noindent{\it Proof.  }}
  250.  
  251. %can redefine in .sty files
  252. \def\qed{\vrule height8pt width4pt depth0pt\par\medskip}
  253.  
  254. %display mode partial derivatives
  255. \def\D#1#2{{{\partial #1} \over {\partial #2}}}
  256.  
  257. %math mode partial derivations
  258. \def\d#1#2{\partial #1/\partial #2}
  259.  
  260. %for naming equations
  261. \def\Equation#1{\global\advance\EquationNumber by 1
  262.           \global\edef#1{\number\EquationNumber}(#1)}
  263.  
  264. %for roman text in math or display mode
  265. \def\text#1{\hbox{\rm #1}}
  266.  
  267. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  268. % Figures -- use \Fig\junk the first time you reference a figure, and
  269. %            use \Figure\junk{2in}{This figure is junk.} when you want
  270. %            it to appear.
  271. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  272.  
  273.  
  274. %%%  \Fig -- for invoking figure
  275. %%%  #1 is reference name for figure
  276.  
  277. \def\Fig#1{\global\advance\FigureNumber by 1
  278.            \global\edef#1{\number\FigureNumber}Figure #1}
  279.  
  280. %%%  \Figure --- to have space reserved for figure.
  281. %%% #1 is reference name for figure
  282. %%% #2 is height of figure
  283. %%% #3 is caption for figure
  284.  
  285. \def\Figure#1#2#3{
  286.      \midinsert
  287.      \vbox to #2{\vfil}
  288.      \hbox to \hsize{\vbox{\parindent=0pt%
  289.      {\bf Figure \number#1}.\space \rm #3}}
  290.      \endinsert}
  291.  
  292. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  293. %      \boxit -- this will surround a box by rules
  294. %                useful for debugging and design purposes 
  295. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  296.  
  297. \newif\ifDoBoxes
  298. \DoBoxestrue
  299.  
  300. \def\boxit#1{\ifDoBoxes\vbox{\hrule\hbox{\vrule\vbox{#1}\vrule}\hrule}
  301. \else\vbox{\hbox{\vbox{#1}}}\fi}
  302.  
  303. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  304. %   References
  305. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  306.  
  307. %will set hanging indentation in amount specified by \parindent
  308. \def\HangRef{\hangindent\parindent\ignorespaces\noindent}
  309.  
  310. \newif\ifbook
  311. \newif\ifjour
  312. \newif\ifinbook
  313. \newif\ifunpublished
  314. \newif\ifinbook
  315.  
  316. \newbox\nobox
  317. \newbox\bybox
  318. \newbox\pagesbox
  319. \newbox\paperbox
  320. \newbox\yrbox
  321. \newbox\datebox
  322. \newbox\volbox
  323. \newbox\jourbox
  324. \newbox\bookbox
  325. \newbox\publbox
  326. \newbox\publaddrbox
  327. \newbox\editorbox
  328. \newbox\paperinfobox
  329. \newbox\bookinfobox
  330.  
  331. \def\no#1{\setbox\nobox\hbox{#1}}
  332. \def\by#1{\setbox\bybox\hbox{#1}}
  333. \def\pages#1{\setbox\pagesbox\hbox{#1}}
  334. \def\paper#1{\setbox\paperbox\hbox{#1}}
  335. \def\yr#1{\setbox\yrbox\hbox{#1}}
  336. \def\date#1{\setbox\datebox\hbox{#1}}
  337. \def\vol#1{\setbox\volbox\hbox{\bf #1}}
  338. \def\jour#1{\setbox\jourbox\hbox{\it #1}\jourtrue}
  339. \def\book#1{\setbox\bookbox\hbox{\it #1}\booktrue}
  340. \def\inbook#1{\setbox\bookbox\hbox{\it #1}\inbooktrue}
  341. \def\editor#1{\setbox\editorbox\hbox{#1}}
  342. \def\publ#1{\setbox\publbox\hbox{#1}}
  343. \def\publaddr#1{\setbox\publaddrbox\hbox{#1}}
  344. \def\paperinfo#1{\setbox\paperinfobox\hbox{#1}\unpublishedtrue}
  345.  
  346. \def\ref{\relax}
  347. \def\endref{\SetRef}
  348.  
  349.  
  350. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  351. %   Headings
  352. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  353.  
  354. \def\runningname#1{\edef\runname{#1}}
  355. \def\runningtitle#1{\edef\runtitle{#1}}
  356.  
  357. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  358. %    \CenterBox and \LeftBox
  359. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  360. %\CenterBox creates a vbox with several lines of centered text
  361. %modeled after TeXbook, p. 412
  362. %     #1 name of box
  363. %     #2 font used in box
  364. %     #3 baselineskip in box
  365. %     #4 text for box, lines separated by \cr
  366. %
  367. %\LeftBox does the same for left justified text
  368. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  369.  
  370. \def\CenterBox#1#2#3#4{
  371.    \global\setbox#1=\vbox{\baselineskip=#3\halign{#2\hfil##\hfil\cr#4\crcr}}}
  372.  
  373. \def\LeftBox#1#2#3#4{
  374.    \global\setbox#1=\vbox{\baselineskip=#3\halign{#2##\hfil\cr#4\crcr}}}
  375.  
  376.  
  377. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  378. %  \section and \subsection
  379. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  380.  
  381. \newbox\sectionbox
  382.  
  383. \def\Romannumeral#1{\uppercase\expandafter{\romannumeral#1}}
  384.  
  385. \newif\ifRomanSection\RomanSectionfalse
  386.  
  387. % taken from TeXbook, p. 355, but changed the parameters so that
  388. %   it won't fill out the page so readily.  If you really want all
  389. %   the pages to be the same size, use \let\BigBreak=\bigbreak
  390.  
  391. \def\BigBreak{\vskip0pt plus .05\vsize\penalty-250
  392.     \vskip0pt plus-.05\vsize\bigskip\vskip\parskip}
  393.  
  394. \def\DoCenteredSection#1{
  395.    \BigBreak
  396.    \SubsectionNumber=0
  397.    \CenterBox
  398.         \sectionbox
  399.         \SectionFont
  400.         \normalbaselineskip
  401.         {\ifRomanSection\Romannumeral\SectionNumber
  402.         \else\number\SectionNumber\fi.\enskip#1}
  403.    \line{\hfil\box\sectionbox\hfil}
  404.    \global\advance\SectionNumber by 1
  405.    \nobreak\medskip
  406.    \noindent}
  407.  
  408. \def\DoLeftSection#1{
  409.    \BigBreak
  410.    \SubsectionNumber=0
  411.    \LeftBox
  412.         \sectionbox
  413.         \SectionFont
  414.         \normalbaselineskip
  415.         {\ifRomanSection{\Romannumeral\SectionNumber}
  416.         \else\number\SectionNumber\fi.\enskip#1}
  417.    \line{\box\sectionbox\hfil}
  418.    \global\advance\SectionNumber by 1
  419.    \nobreak\medskip
  420.    \noindent}
  421.  
  422. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  423. %   Titles and authors
  424. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  425.  
  426. \def\DoCenteredTitle#1{
  427.     \titlepage\global
  428.     \CenterBox
  429.        \titlebox
  430.        \TitleFont
  431.        \normalbaselineskip
  432.        {#1}}
  433.  
  434. \def\DoLeftTitle#1{
  435.     \titlepage\global
  436.     \LeftBox
  437.        \titlebox
  438.        \TitleFont
  439.        \normalbaselineskip
  440.        {#1}}
  441.  
  442. \def\DoCenteredAuthor#1{
  443.     \CenterBox
  444.        \authorbox
  445.        \AuthorFont
  446.        \normalbaselineskip
  447.        {#1}}
  448.  
  449. \def\DoLeftAuthor#1{
  450.      \LeftBox
  451.      \authorbox
  452.      \AuthorFont
  453.      \normalbaselineskip
  454.       {#1}}
  455.  
  456.  
  457. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  458. %   \prelim -- will write "preliminary verison" on cover
  459. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  460.  
  461. \newif\ifPreliminaryVersion
  462.  \global\PreliminaryVersionfalse
  463.  
  464. \def\prelim{\PreliminaryVersiontrue}
  465.  
  466. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  467. %   quote mode -- inserts and singlespaces
  468. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  469.  
  470. \def\quote#1{\medskip{\normalbaselineskip=12pt\tenpoint
  471.        \narrower #1 \par}\smallskip}
  472.  
  473. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  474. %   \doublespace -- prints document in doublespace
  475. %   \singlespace -- reverts to singlespace
  476. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  477.  
  478. \newif\ifdouble\doublefalse 
  479. \def\doublespace{\global\doubletrue\tenpoint}
  480. \def\singlespace{\global\doublefalse\tenpoint}
  481.  
  482. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  483. %   define dummys; will be redefined if needed in .sty files
  484. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  485.  
  486. \def\runtitle#1{}
  487. \def\runname#1{}
  488. \def\titleheadline{\hfil}
  489. \def\titlefootline{\hfil}
  490. \overfullrule=0pt  %so the black boxes don't print out in margins
  491. \def\enddocument{\relax}
  492.